From: Glenn Morris <rgm@gnu.org>
Date: Thu, 17 Sep 2009 06:19:57 +0000 (+0000)
Subject: (ansi-color-get-face-1): Fix typo in handler.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~10447
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=507a9635b4e338763ff2804359c067558771ded3;p=emacs.git

(ansi-color-get-face-1): Fix typo in handler.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2806653f678..f71543a9aaa 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2009-09-17  Glenn Morris  <rgm@gnu.org>
 
+	* ansi-color.el (ansi-color-get-face-1): Fix typo in handler.
+
 	* simple.el (hard-newline): Give it a doc-string.
 
 2009-09-17  Dan Nicolaescu  <dann@ics.uci.edu>
diff --git a/lisp/ansi-color.el b/lisp/ansi-color.el
index 66f128a2e83..e343f560169 100644
--- a/lisp/ansi-color.el
+++ b/lisp/ansi-color.el
@@ -604,7 +604,7 @@ property of `ansi-color-faces-vector' and `ansi-color-names-vector'."
 ANSI-CODE is used as an index into the vector."
   (condition-case nil
       (aref ansi-color-map ansi-code)
-    ('args-out-of-range nil)))
+    (args-out-of-range nil)))
 
 (defun ansi-color-get-face (escape-seq)
   "Create a new face by applying all the parameters in ESCAPE-SEQ.